object FrmPrincipal: TFrmPrincipal
  Left = 301
  Top = 151
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Gerar Chave'
  ClientHeight = 150
  ClientWidth = 535
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 7
    Top = 8
    Width = 521
    Height = 65
    Caption = 'Gerar Chave:'
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Top = 16
      Width = 23
      Height = 13
      Caption = 'Data'
    end
    object Label2: TLabel
      Left = 114
      Top = 16
      Width = 31
      Height = 13
      Caption = 'Chave'
    end
    object txtData: TwwDBDateTimePicker
      Left = 6
      Top = 32
      Width = 107
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 0
      OnKeyDown = txtDataKeyDown
    end
    object txtChave: TEdit
      Left = 114
      Top = 32
      Width = 400
      Height = 21
      ReadOnly = True
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 7
    Top = 80
    Width = 521
    Height = 65
    Caption = 'Ver Chave:'
    TabOrder = 1
    object Label4: TLabel
      Left = 6
      Top = 16
      Width = 31
      Height = 13
      Caption = 'Chave'
    end
    object Label3: TLabel
      Left = 408
      Top = 16
      Width = 23
      Height = 13
      Caption = 'Data'
    end
    object txtChave1: TEdit
      Left = 6
      Top = 32
      Width = 400
      Height = 21
      TabOrder = 0
      OnKeyDown = txtChave1KeyDown
    end
    object txtData1: TwwDBDateTimePicker
      Left = 408
      Top = 32
      Width = 107
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ReadOnly = True
      ShowButton = True
      TabOrder = 1
    end
  end
end
